home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 002 / editc.lqr / ED6.C < prev    next >
Text File  |  1985-06-14  |  640b  |  59 lines
  1. /* ED6.C */
  2.  
  3. #include "ed0.c"
  4. #include "ed1.ccc"
  5. int outx,outy;
  6. outxget()
  7. {
  8.     return(outx);
  9. }
  10. outyget()
  11. {
  12.     return(outy);
  13. }
  14. outchar(c) char c;
  15. {
  16.     syscout(c);
  17.     outx++;
  18.     return(c);
  19. }
  20. outxy(x,y) int x,y;
  21. {
  22.     outx=x;
  23.     outy=y;
  24.     scr_rowcol(y,x);
  25. }
  26. outclr()
  27. {
  28.     scr_clr();
  29. }
  30. outdelln()
  31. {
  32.     outxy(0,outy);
  33.     outdeol();
  34. }
  35. outdeol()
  36. {
  37.     scr_clrl();
  38. }
  39. outuphas()
  40. {
  41.     return(YES);
  42. }
  43. outdnhas()
  44. {
  45.     return(YES);
  46. }
  47. outsup()
  48. {
  49.     outxy(0,SCRNL1);
  50.     sysdelay();
  51.     scr_scup(); 
  52. }
  53. outsdn()
  54. {
  55.     outxy(0,0);
  56.     sysdelay();
  57.     scr_scdn();
  58. }
  59.